home *** CD-ROM | disk | FTP | other *** search
/ PC Media 7 / PC MEDIA CD07.iso / share / prog / cacoph10 / beeth.c next >
Encoding:
C/C++ Source or Header  |  1994-04-17  |  1.6 KB  |  90 lines
  1. #include "music.h"
  2.  
  3. main( void )
  4.     {
  5.     tempo = 76;
  6.     schord( BF5, REST, N8 );
  7.  
  8.     chord( A5, REST, N8 );
  9.     chord( F4, EF3, N8 );
  10.     chord( BF5, D3, N8 );
  11.     chord( C5, A4, N8 );
  12.  
  13.     schord( D5, BF4, N4 );
  14.     chord( C5, A4, N8 );
  15.     schord( D5, AF4, N8 );
  16.  
  17.     chord( EF5, G3, N8 );
  18.     chord( D5, F3, N8 );
  19.     chord( C5, EF3, N8 );
  20.     chord( BF5, E3, N8 );
  21.  
  22.     chord( A5, F3, N8 );
  23.     chord( G4, C3, N8 );
  24.     chord( F4, A3, N8 );
  25.     schord( BF5, REST, N8 );
  26.  
  27.     chord( A5, REST, N8 );
  28.     chord( F4, EF3, N8 );
  29.     chord( BF5, D3, N8 );
  30.     chord( C5, A4, N8 );
  31.  
  32.     schord( D5, BF4, N4 );
  33.     chord( C5, A4, N8 );
  34.     schord( D5, AF4, N8 );
  35.  
  36.     chord( EF5, G3, N8 );
  37.     chord( D5, F3, N8 );
  38.     chord( C5, EF3, N8 );
  39.     chord( F5, F3, N8 );
  40.  
  41.     schord( BF5, D3, N8 );
  42.     schord( BF5, F3, N8 );
  43.     chord( BF5, D3, N8 );
  44.     chord( D5, FS3, N8 );
  45.  
  46.     chord( D5, G3, N8 );
  47.     chord( D5, A4, N8 );
  48.     chord( D5, BF4, N8 );
  49.     chord( C5, E3, N8 );
  50.  
  51.     chord( C5, F3, N8 );
  52.     chord( C5, G3, N8 );
  53.     chord( C5, A4, N8 );
  54.     chord( E5, G3, N8 );
  55.  
  56.     chord( F5, A4, N8 );
  57.     chord( E5, G3, N8 );
  58.     chord( F5, A4, N8 );
  59.     chord( G5, BF4, N8 );
  60.  
  61.     chord( C5, A4, N8 );
  62.     chord( E5, G3, N8 );
  63.     chord( F5, F3, N8 );
  64.     schord( BF5, D3, N8 );
  65.  
  66.     chord( A5, EF3, N8 );
  67.     chord( F4, EF3, N8 );
  68.     chord( BF5, D3, N8 );
  69.     chord( C5, A4, N8 );
  70.  
  71.     schord( D5, BF4, N8 );
  72.     chord( D5, F3, N8 );
  73.     chord( C5, A3, N8 );
  74.     chord( D5, AF3, N8 );
  75.  
  76.     chord( EF5, G3, N8 );
  77.     chord( D5, F3, N8 );
  78.     chord( C5, E3, N8 );
  79.     chord( F5, EF3, N8 );
  80.  
  81.     schord( BF5, D3, N16 );
  82.     schord( BF5, BF4, N16 );
  83.     schord( BF5, F3, N16 );
  84.     schord( BF5, D3, N16 );
  85.     chord( BF5, BF3, N8 );
  86.  
  87.     nosound();
  88.     return 0;
  89.     }
  90.